SuperStrict
Import jmd.rad

Local value:Int=1

Graphics 640,480
While Not KeyDown(KEY_ESCAPE)
	If KeyHit(KEY_UP)
		value=value+1
	EndIf
	If KeyHit(KEY_DOWN)
		value=value-1
	EndIf

	Cls
	DrawText "Use the Up and Down arrows to change value",10,10
	DrawText "Value:                    " + value,10,50
	DrawText "wrapped between 9 and 14: " + wrap(value,9,14),10,70
	Flip
Wend
End






